home *** CD-ROM | disk | FTP | other *** search
-
-
-
- CCCCCCCCHHHHDDDDCCCC((((3333FFFF)))) CCCCCCCCHHHHDDDDCCCC((((3333FFFF))))
-
-
-
- NNNNAAAAMMMMEEEE
- CCHDC - CCHDC computes the Cholesky decomposition of a positive
- definite matrix. A pivoting option allows the user to estimate the
- condition of a positive definite matrix or determine the rank of a
- positive semidefinite matrix.
-
-
- SSSSYYYYNNNNOOOOPPPPSSSSYYYYSSSS
- SUBROUTINE CCHDC(A,LDA,P,WORK,JPVT,JOB,INFO)
-
- DDDDEEEESSSSCCCCRRRRIIIIPPPPTTTTIIIIOOOONNNN
- On Entry
-
- AAAA COMPLEX(LDA,P).
- A contains the matrix whose decomposition is to
- be computed. Only the upper half of A need be stored.
- The lower part of The array A is not referenced.
-
- LLLLDDDDAAAA INTEGER.
- LDA is the leading dimension of the array A.
-
- PPPP INTEGER.
- P is the order of the matrix.
-
- WWWWOOOORRRRKKKK COMPLEX.
- WORK is a work array.
-
- JJJJPPPPVVVVTTTT INTEGER(P).
- JPVT contains integers that control the selection
- of the pivot elements, if pivoting has been requested.
- Each diagonal element A(K,K)
- is placed in one of three classes according to the
- value of JPVT(K)).
- If JPVT(K)) .GT. 0, then X(K) is an initial
- element.
- If JPVT(K)) .EQ. 0, then X(K) is a free element.
- If JPVT(K)) .LT. 0, then X(K) is a final element.
- Before the decomposition is computed, initial elements
- are moved by symmetric row and column interchanges to
- the beginning of the array A and final
- elements to the end. Both initial and final elements
- are frozen in place during the computation and only
- free elements are moved. At the K-th stage of the
- reduction, if A(K,K) is occupied by a free element
- it is interchanged with the largest free element
- A(L,L) with L .GE. K. JPVT is not referenced if
- JOB .EQ. 0.
-
- JJJJOOOOBBBB INTEGER.
- JOB is an integer that initiates column pivoting.
- IF JOB .EQ. 0, no pivoting is done.
- IF JOB .NE. 0, pivoting is done. On Return
-
-
-
- PPPPaaaaggggeeee 1111
-
-
-
-
-
-
- CCCCCCCCHHHHDDDDCCCC((((3333FFFF)))) CCCCCCCCHHHHDDDDCCCC((((3333FFFF))))
-
-
-
- AAAA A contains in its upper half the Cholesky factor
- of the matrix A as it has been permuted by pivoting.
-
- JJJJPPPPVVVVTTTT JPVT(J) contains the index of the diagonal element
- of A that was moved into the J-th position,
- provided pivoting was requested.
-
- IIIINNNNFFFFOOOO contains the index of the last positive diagonal
- element of the Cholesky factor. For positive definite matrices INFO =
- P is the normal return. For pivoting with positive semidefinite matrices
- INFO will in general be less than P. However, INFO may be greater than
- the rank of A, since rounding error can cause an otherwise zero element
- to be positive. Indefinite systems will always cause
-
- IIIINNNNFFFFOOOO to be less than P. LINPACK. This version dated 03/19/79 .
-
- JJJJ University of Maryland. BLAS CAXPY,CSWAP Fortran SQRT,REAL,CONJG
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- PPPPaaaaggggeeee 2222
-
-
-
-